00100 WDO ; 00200 VLNC 0,5; 00300 P2 .2; 00400 P3 1 800,1200; 00500 P4 1 250,500; 00600 P5 "P4* 3.14"; 00700 P6 0; 00800 P7 1 3,5; 00900 P8 ".41*P4"; 01000 P9 .000; 01100 P10 4; 01200 P11 F8/P12 F6; 01300 P13 0; 01400 P14 0; 01500 P15 1 5.5,6.5; 01600 P16 1/P17 F6; 01700 P18 .03; 01800 P19 .07; 01850 P20 F8/P21 P2; 01900 END; 02000 02100 RUN;